inherited fmUretimSeriOkutma: TfmUretimSeriOkutma
  Left = 211
  Top = 145
  Caption = #220'retim Par'#231'ala SeriNo Okutma'
  ClientHeight = 544
  ClientWidth = 1028
  KeyPreview = True
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Splitter1: TSplitter [0]
    Left = 446
    Top = 33
    Width = 2
    Height = 511
  end
  object Panel1: TPanel [1]
    Left = 0
    Top = 0
    Width = 1028
    Height = 33
    Align = alTop
    TabOrder = 0
    object Label1: TLabel
      Left = 8
      Top = 8
      Width = 60
      Height = 13
      Caption = 'Malzeme Fi'#351'i'
      Transparent = True
    end
    object Label18: TLabel
      Left = 261
      Top = 8
      Width = 35
      Height = 14
      Caption = #304'lk Tarih'
      Font.Charset = TURKISH_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object Label19: TLabel
      Left = 413
      Top = 8
      Width = 45
      Height = 14
      Caption = 'Son Tarih'
      Font.Charset = TURKISH_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object MalzemeFisik: TwwDBComboBox
      Left = 80
      Top = 4
      Width = 153
      Height = 21
      ShowButton = True
      Style = csDropDownList
      MapList = True
      AllowClearKey = False
      AutoDropDown = True
      DropDownCount = 8
      ItemHeight = 0
      Items.Strings = (
        #220'r'#252'n Par'#231'alama Fi'#351'i'#9'UP'
        'Ters '#220'retim Fi'#351'i'#9'TU')
      ItemIndex = 0
      Sorted = False
      TabOrder = 0
      UnboundDataType = wwDefault
    end
    object t1: TwwDBDateTimePicker
      Left = 308
      Top = 4
      Width = 85
      Height = 21
      CalendarAttributes.Font.Charset = DEFAULT_CHARSET
      CalendarAttributes.Font.Color = clWindowText
      CalendarAttributes.Font.Height = -11
      CalendarAttributes.Font.Name = 'MS Sans Serif'
      CalendarAttributes.Font.Style = []
      Epoch = 1950
      ShowButton = True
      TabOrder = 1
      UnboundDataType = wwDTEdtDate
    end
    object t2: TwwDBDateTimePicker
      Left = 471
      Top = 4
      Width = 85
      Height = 21
      CalendarAttributes.Font.Charset = DEFAULT_CHARSET
      CalendarAttributes.Font.Color = clWindowText
      CalendarAttributes.Font.Height = -11
      CalendarAttributes.Font.Name = 'MS Sans Serif'
      CalendarAttributes.Font.Style = []
      Epoch = 1950
      ShowButton = True
      TabOrder = 2
      UnboundDataType = wwDTEdtDate
    end
    object blistele: TBitBtn
      Left = 582
      Top = 3
      Width = 79
      Height = 26
      Caption = 'Listele'
      Font.Charset = TURKISH_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 3
      OnClick = blisteleClick
    end
  end
  object Panel2: TPanel [2]
    Left = 0
    Top = 33
    Width = 446
    Height = 511
    Align = alLeft
    TabOrder = 1
    object grdEmirList: TwwDBGrid
      Left = 1
      Top = 1
      Width = 444
      Height = 509
      DisableThemes = False
      Selected.Strings = (
        'emirno'#9'6'#9'Emir No'#9#9
        'stokkodu'#9'15'#9'Stok Kodu'#9'F'
        'miktar'#9'5'#9'Miktar'#9'F'
        'tarih'#9'9'#9'Tarih'#9'F'
        'CDepo'#9'8'#9#199#305'kan Depo'#9'F'
        'GDepo'#9'8'#9'Giren Depo'#9'F')
      IniAttributes.Delimiter = ';;'
      TitleColor = clBtnFace
      FixedCols = 0
      ShowHorzScrollBar = True
      Align = alClient
      Color = 14811135
      DataSource = dsEmirList
      Font.Charset = TURKISH_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'Arial'
      Font.Style = []
      KeyOptions = [dgEnterToTab]
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgCancelOnExit, dgWordWrap]
      ParentFont = False
      ReadOnly = True
      TabOrder = 0
      TitleAlignment = taLeftJustify
      TitleFont.Charset = TURKISH_CHARSET
      TitleFont.Color = clBlack
      TitleFont.Height = -11
      TitleFont.Name = 'Arial'
      TitleFont.Style = [fsBold]
      TitleLines = 1
      TitleButtons = True
      UseTFields = False
      object wwDBGrid1IButton: TwwIButton
        Left = 0
        Top = 0
        Width = 13
        Height = 22
        AllowAllUp = True
        Caption = 'X'
      end
    end
  end
  object Panel3: TPanel [3]
    Left = 448
    Top = 33
    Width = 580
    Height = 511
    Align = alClient
    TabOrder = 2
    object Panel4: TPanel
      Left = 1
      Top = 1
      Width = 578
      Height = 38
      Align = alTop
      BevelInner = bvRaised
      BevelOuter = bvLowered
      TabOrder = 0
      object Label2: TLabel
        Left = 8
        Top = 12
        Width = 44
        Height = 16
        AutoSize = False
        Caption = 'Seri No'
        Font.Charset = TURKISH_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
        Transparent = True
      end
      object Label3: TLabel
        Left = 329
        Top = 11
        Width = 44
        Height = 16
        AutoSize = False
        Caption = 'Seri No'
        Font.Charset = TURKISH_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
        Transparent = True
      end
      object SeriNo: TwwDBEdit
        Left = 64
        Top = 8
        Width = 153
        Height = 21
        TabOrder = 0
        UnboundDataType = wwDefault
        WantReturns = False
        WordWrap = False
        OnEnter = SeriNoEnter
        OnExit = SeriNoExit
      end
      object SeriNo2: TwwDBEdit
        Left = 385
        Top = 8
        Width = 153
        Height = 21
        TabOrder = 1
        UnboundDataType = wwDefault
        WantReturns = False
        WordWrap = False
        OnEnter = SeriNo2Enter
        OnExit = SeriNo2Exit
      end
    end
    object Panel5: TPanel
      Left = 1
      Top = 39
      Width = 578
      Height = 471
      Align = alClient
      TabOrder = 1
      object grdEmirListharhar: TwwDBGrid
        Left = 271
        Top = 1
        Width = 368
        Height = 469
        DisableThemes = False
        Selected.Strings = (
          'stokkodu'#9'25'#9'Stok Kodu'#9'F'
          'miktar'#9'4'#9'Mik.'#9'F'
          'yapilan'#9'4'#9'Okut.'#9'F')
        IniAttributes.Delimiter = ';;'
        TitleColor = clBtnFace
        FixedCols = 0
        ShowHorzScrollBar = True
        Align = alLeft
        Color = 14811135
        DataSource = dsEmirListharhar
        Enabled = False
        Font.Charset = TURKISH_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'Arial'
        Font.Style = []
        KeyOptions = [dgEnterToTab]
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgCancelOnExit, dgWordWrap]
        ParentFont = False
        ReadOnly = True
        TabOrder = 0
        TitleAlignment = taLeftJustify
        TitleFont.Charset = TURKISH_CHARSET
        TitleFont.Color = clBlack
        TitleFont.Height = -11
        TitleFont.Name = 'Arial'
        TitleFont.Style = [fsBold]
        TitleLines = 1
        TitleButtons = True
        UseTFields = False
        OnCalcCellColors = grdEmirListharharCalcCellColors
        PaintOptions.ActiveRecordColor = clRed
        object wwIButton1: TwwIButton
          Left = 0
          Top = 0
          Width = 13
          Height = 22
          AllowAllUp = True
          Caption = 'X'
        end
      end
      object grdEmirListhar: TwwDBGrid
        Left = 1
        Top = 1
        Width = 270
        Height = 469
        DisableThemes = False
        Selected.Strings = (
          'stokkodu'#9'23'#9'Stok Kodu'#9'F'
          'miktar'#9'4'#9'Mik.'#9'F'
          'yapilan'#9'4'#9'Okut.'#9'F')
        IniAttributes.Delimiter = ';;'
        TitleColor = clBtnFace
        FixedCols = 0
        ShowHorzScrollBar = True
        Align = alLeft
        Color = 14811135
        DataSource = dsEmirListhar
        Enabled = False
        Font.Charset = TURKISH_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'Arial'
        Font.Style = []
        KeyOptions = [dgEnterToTab]
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgCancelOnExit, dgWordWrap]
        ParentFont = False
        ReadOnly = True
        TabOrder = 1
        TitleAlignment = taLeftJustify
        TitleFont.Charset = TURKISH_CHARSET
        TitleFont.Color = clBlack
        TitleFont.Height = -11
        TitleFont.Name = 'Arial'
        TitleFont.Style = [fsBold]
        TitleLines = 1
        TitleButtons = True
        UseTFields = False
        OnCalcCellColors = grdEmirListharCalcCellColors
        PaintOptions.ActiveRecordColor = clRed
        object wwIButton2: TwwIButton
          Left = 0
          Top = 0
          Width = 13
          Height = 22
          AllowAllUp = True
          Caption = 'X'
        end
      end
    end
  end
  object aqEmirList: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    AfterOpen = aqEmirListAfterScroll
    AfterScroll = aqEmirListAfterScroll
    Parameters = <
      item
        Name = 't1'
        Attributes = [paNullable]
        DataType = ftDateTime
        Precision = 16
        Size = 16
        Value = Null
      end
      item
        Name = 't2'
        Attributes = [paNullable]
        DataType = ftDateTime
        Precision = 16
        Size = 16
        Value = Null
      end
      item
        Name = 'Tipi'
        Attributes = [paNullable]
        DataType = ftString
        NumericScale = 255
        Precision = 255
        Size = 10
        Value = Null
      end>
    SQL.Strings = (
      'select u.*,'
      'd1.DepoAdi GDepo,'
      'd2.DepoAdi CDepo'
      ' from uremri u'
      'left join Depolar d1 on (d1.id=u.GirdiDepo)'
      'left join Depolar d2 on (d2.id=u.CiktiDepo)'
      
        'Where u.tarih between :t1 and :t2 and u.Tipi=:Tipi and u.UrDurum' +
        ' is null'
      'order by u.emirno')
    Left = 188
    Top = 120
  end
  object dsEmirList: TDataSource
    DataSet = aqEmirList
    Left = 260
    Top = 120
  end
  object aqEmirListhar: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    Parameters = <
      item
        Name = 'Emirno'
        Attributes = [paSigned, paNullable]
        DataType = ftInteger
        Precision = 10
        Size = 4
        Value = Null
      end>
    SQL.Strings = (
      'select * from Uremrihar'
      'Where EmirNo=:Emirno and UrunCk='#39'Y'#39' and Miktar>isnull(Yapilan,0)'
      
        'and 2=(Select isnull(izlemeturu,0) from stok where stokkod=Uremr' +
        'ihar.stokkod)'
      'and stokkodu not like '#39'ZZ%'#39
      'order by emirno')
    Left = 188
    Top = 184
  end
  object dsEmirListhar: TDataSource
    DataSet = aqEmirListhar
    Left = 260
    Top = 184
  end
  object aqEmirListharhar: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    Parameters = <
      item
        Name = 'Emirno'
        Attributes = [paSigned, paNullable]
        DataType = ftInteger
        Precision = 10
        Size = 4
        Value = Null
      end>
    SQL.Strings = (
      'select * from Uremrihar'
      'Where EmirNo=:Emirno and UrunCk='#39'C'#39' and Miktar>isnull(Yapilan,0)'
      
        'and 2=(Select isnull(izlemeturu,0) from stok where stokkod=Uremr' +
        'ihar.stokkod)'
      'and stokkodu not like '#39'ZZ%'#39' and isnull(UretimdeOkutma,0)=0'
      'order by emirno')
    Left = 188
    Top = 247
  end
  object dsEmirListharhar: TDataSource
    DataSet = aqEmirListharhar
    Left = 260
    Top = 248
  end
  object aqSerinos: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    Parameters = <
      item
        Name = 'Serinos'
        DataType = ftString
        NumericScale = 255
        Precision = 255
        Size = 50
        Value = Null
      end>
    SQL.Strings = (
      'Select * from Fatharhar Where Serinos=:Serinos')
    Left = 188
    Top = 304
  end
  object aqFatharhar: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    Parameters = <>
    SQL.Strings = (
      'Select * from Fatharhar Where 1=2')
    Left = 188
    Top = 360
  end
  object aqSerinos2: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    Parameters = <
      item
        Name = 'Serinos'
        DataType = ftString
        NumericScale = 255
        Precision = 255
        Size = 50
        Value = Null
      end>
    SQL.Strings = (
      'Select * from Fatharhar Where Serinos=:Serinos')
    Left = 260
    Top = 304
  end
  object UretimArizaQ: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    Parameters = <
      item
        Name = 'Serino'
        Attributes = [paNullable]
        DataType = ftString
        NumericScale = 255
        Precision = 255
        Size = 50
        Value = Null
      end>
    SQL.Strings = (
      'Select selected,id,kayitno,stokkod,eSeriNo,Makinano,perkod,'
      
        'islemtarihi,arizasi,durum,ySerino,cambar,gambar from UretimAriza' +
        ' '
      'where durum=1 and eSerino=:Serino')
    Left = 256
    Top = 360
  end
end
